#!/usr/bin/env perl

#提示用户输入两个数字
print "input a:\n";
$a = <STDIN>;
print "input b:\n";
$b = <STDIN>;

#计算两数字的乘积
$c = $a * $b;

#输出结果
print "the result is $c\n";
